Great Canadian Scientists/GCS_CD.iso/mac/PC/GCSData/prefs_o.dxr/00005_QuizFreq Toggle.ls

Text File | 1996-09-01 | 331 b | 14 lines

on mouseUp
  global QuizFreq
  repeat with count = 24 to 27
    set the hilite of cast count to 0
  end repeat
  set the hilite of cast the castNum of sprite the clickOn to 1
  repeat with count = 24 to 27
    if the hilite of cast count = 1 then
      set QuizFreq to abs(count - 27)
    end if
  end repeat
  SetTimeToQuiz()
end